timeIn = GetTickCount
var = 0
while var <> 3'000'000
      var = var + 1
endw

_seconds_ = (GetTickCount - timeIn) / 1000